home *** CD-ROM | disk | FTP | other *** search
/ The Programmer Disk / The Programmer Disk (Microforum).iso / xpro / basic3 / pro3 / nobreak.bas (.txt) < prev    next >
Encoding:
GW-BASIC  |  1990-12-28  |  461 b   |  17 lines
  1. 10  REM  This module will disable calls to Ctrl-Break and System Reset
  2. 20  REM
  3. 30  REM
  4. 40  REM
  5. 50  REM         *** Disable Ctrl-Break & System Reset ***
  6. 60  REM
  7. 70  KEY 15,CHR$(4)+CHR$(70)      : REM trap Ctrl-Break
  8. 80  KEY(15) ON
  9. 90  KEY 16,CHR$(12)+CHR$(83)     : REM trap system reset
  10. 100  KEY(16) ON
  11. 110  ON KEY(15) GOSUB 140
  12. 120  ON KEY(16) GOSUB 150
  13. 130  RETURN
  14. 140  SOUND 40,3:RETURN            :REM Add any message/routine here for ctrl-brk
  15. 150  SOUND 40,3:RETURN            :REM Add any message/routine here for sys reset
  16. 160  REM
  17.